/ Program : test01.as
/
/ Desc : This program computes c = a + b
/
/-------------------------------------------
/
/ Code Section
/
*0200			/ start at address 0200
Main, 	cla cll
	tad A
	and B
	dca C

	cla cll
	tad D
	tad E
	dca F

	tad G
	dca H

	cla cll
	isz I
	tad I
	dca I

	isz J
	tad J
	dca J

	cla cll
	jms GO

	tad C
	tad D

GO,  0
	cla cll
	tad A
	tad B	
	JMP I GO
	
	dca I

	isz J
	
	JMS NEXT
	
	tad J
	
	
	dca J

NEXT, 0
	cla cll
	jms GO

	jmp I NEXT
	
	tad C
	tad D
	
//	jmp Main	/ To continue - goto Main
/
/ Data Section
/
*0250 			/ place data at address 0250
A, 	3377		/ A @ memindex 250
B, 	7733		/ B @ memindex 251
C, 	0000 		/ C @ memindex 252
D, 	3333		/ D @ memindex 253
E, 	4444 		/ E @ memindex 254
F, 	0000		/ F @ memindex 255
G, 	0001 		/ G @ memindex 256
H, 	7777 		/ H @ memindex 257
I, 	7777 		/ I @ memindex 258
J, 	0000 		/ J @ memindex 259
K, 	1111 		/ G @ memindex 260
L, 	3333 		/ H @ memindex 261
M, 	0000 		/ I @ memindex 262
$Main 			/ End of Program; Main is entry point
